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A method and apparatus are disclosed for telemetering both analog and digital data from an implantable medical device to 
an external receiver, such as between an implanted cardiac pacer and its external programming equipment. Analog data is first 
converted to digital format by an analog-to-digital converter, such that the transmission is digital data. A damped carrier at 175 
kilohertz is pulse position modulated by the data. The modulation scheme defines a frame of slightly less than 2 milliseconds. 
The frame is divided into 64 individual time periods using a crystal clock. The data, along with synchronization and identification 
codes, are positioned into predefined ranges within each frame as measured by the individual time periods. The data is uniquely 
identified by the position of a burst of the carrier within the predefined range. This modulation scheme enables necessary data to 
be transmitted at sufficiently high rates with reduced power requirements thereby conserving the internal battery of the implan- 
table device. This modulation scheme provides flexibility of use, for example, with complex medical devices where transmission 
of increased volumes of data is desirable, such as cardiac devices having dual-chamber or multisensor capabilities, and for con- 
trolling particular conditions, such as tachyarrhythmia. 
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IMPROVED TELEMETRY FORMAT 



BACKGROUND OF THE INVENTION 
Field of the Invention , 

The present invention generally relates to 
5 implantable medical devices, and more particularly, 
pertains to telemetry schemes for percutaneously 
transmitting analog and digital data from an implantable 
medical device. 
Description of the Prior Art . 

10 The earliest implantable medical devices were 

designed to operate in a single mode and with no direct 
percutaneous communication. Later it became clinically 
desirable to vary certain of the operating parameters and 
change modes of operation. This was accomplished through 

15 the use of programmers and other external devices which 
transferred commands percutaneously to the implanted 
medical device . 

The communication between the implant and the 
external world was at first primarily indirect. The 

20 operation of an implantable cardiac pacer could be 

observed, for example, in the electrocardiogram of the 
patient. Soon it became known that data could be sent 
from the implanted cardiac pacer by modulating the 
stimulation pulses in some manner. This can only provide 

25 a low bandpass channel, of course, without interfering 
with the clinical application of the device. Change of 
the pacing rate to indicate battery condition was a 
commonly used application of this technique. 

As implantable cardiac pacers became more complex, 

30 the desirability to transfer more data at higher speeds 
resulted in the percutaneous transmission of data using a 
radio frequency carrier. The data to be transmitted is 
of two basic types, namely, analog and digital. The 
analog information can include, for example, battery 

35 voltage, intracardiac electrocardiogram, sensor signals, 
output amplitude, output energy, output current, and lead 
impedance. The digital information can include, for 
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example, statistics on performance, markers, current 
values of programmable parameters, implant data f and 
patient and unit identifiers. 

The earliest RF telemetry systems transmitted analog 
5 and digital information in separate formats, resulting in 
inefficient utilization of the available power/bandwidth. 
Also, these modulation schemes tended to be less than 
satisfactory in terms of battery consumption, and do not 
lend themselves to simultaneous transmission of differing 

10 data types. 

Many types of RF telemetry systems are known to be 
used in connection with implantable medical devices, such 
as cardiac pacemakers. An example of a pulse interval 
modulation telemetry system used for transmitting analog 

15 and digital data, individually and serially, from an 
implanted pacemaker to a remote programmer is disclosed 
in U.S. Patent No. 4,556,063 issued to Thompson et al., 
herein incorporated by reference. An example of a modern 
pacemaker programmer for use with programmable cardiac 

20 pacemakers having RF telemetric capabilities is disclosed 
in U.S. Patent No. 4,550,370 issued to Baker, herein 
incorporated by reference. However, the telemetry format 
which is used under these systems, as well as other prior 
telemetry systems, have not been entirely adequate for 

25 reasons described above and a need for significant 

improvement has continued. As will become apparent from 
the following, the present invention satisfies that need. 

SUMMARY OF THE INVENTION 
The present invention percutaneously transmits all 
30 data from the implantable medical device in a digital 

format. It is pulse position modulated on an RF carrier. 
To accomplish this, the analog quantities must be 
converted to digital values either at the time of 
transmission, such as for real-time intracardiac 
35 electrocardiograms, or before storage in the memory of 
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the device, as in the case of historical values of pacing 
rate for subsequent transmission for trend analysis. 

Whether the data to be sent is initially analog or 
digital, it is transmitted in the same format, i.e., as 
5 digital information. The RF carrier is pulse position 
modulated to conserve battery energy. In this manner, 
only a short burst of the carrier, e.g., one cycle, is 
actually needed to transmit a given unit of data. The 
time position of that burst relative to a synchronizing 
10 standard determines the value of the data unit 
transmitted. 

To accomplish this pulse position modulation, a 
frame of about 2 milliseconds is defined. Within this 
frame are positioned a synchronizing burst, a frame 
15 identifier burst, and one or more data bursts. The 

synchronizing burst is positioned at a fixed position in 
the frame. The frame identifier and data are variables, 
such that the corresponding bursts occur within a range 
of time within the frame. The range in which a burst is 
^20 found defines the nature or type of the variable. The 
position in the range defines the value of the variable. 

Because all data transmission is in a digital 
format, great flexibility is achieved with regard to 
additional units of data for future applications. The 
25 use of the standardized format and capability of encoding 
more data into a single pulse also decreases the overall 
battery current requirements and serves to level the 
energy demand over time. Transmitting the analog data in 
digital form provides enhanced noise immunity and 
30 accuracy. 

The transmission protocol provides data rates which 
are sufficient to transfer clinically useful EGM 
information in real time. Because each frame is 
independent, data quantities of varying precision can be 
35 transmitted using the same protocol. This modulation 
scheme provides flexibility of use, for example, with 
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complex medical devices where transmission of increased 
volumes of data is desirable in real time, such as 
cardiac devices having dual-chamber or multisensor 
capabilities, and for controlling particular conditions 
5 such as tachyarrhythmia. 

BRIEF DESCRIPTION OF THE DRAWINGS 
The present invention will be better understood, and 
its attendant advantages will be readily appreciated, by 
reference to the accompanying drawings when taken in 
10 consideration with the following detailed description, 
wherein: 

FIG. 1 is a simplified schematic view of an 
implantable medical device employing the improved 
telemetry format of the present invention; 
15 FIG, 2 is a conceptual view of one frame of the 

improved telemetry format of the present invention; 

FIG. 3 is a view of the actual transmission pattern 
of two frames of the improved telemetry format; 

FIG. 4 is a block diagram of a portion of an 
20 implantable medical device for implementation of the 
improved telemetry format; 

FIG. 5 is a simplified flowchart showing the basic 
function of software to perform the telemetry uplink 
operation of the improved telemetry format; 
25 FIG. 6 is a block diagram of the circuitry of the 

telemetry uplink hardware for implementing the improved 
telemetry format; 

FIG. 7 is a block diagram of the circuitry of the 
telemetry timing for implementing the improved telemetry 
30 format; and 

FIG. 8 is a schematic diagram of the driver 
circuitry for implementing the improved telemetry format. 
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DETAILED DESCRIPTION OF THE PREFERRED EMBODIMENTS 
A preferred embodiment of the present invention is 
disclosed relating to use of the improved telemetry 
format with an implantable cardiac pacer, which may be 
5 programmable. However, those of skill in the art will be 
readily able to adapt the teachings found herein to other 
implantable medical devices. It will also be understood 
by those of skill in the art that the telemetry format 
taught herein can be used for bi-directional 

10 communications between an implanted medical device and an 
external device. 

FIG. 1 is a simplified schematic diagram of the 
present invention as employed in a cardiac pacing system. 
An implantable pulse generator 10 is implanted in the 

15 patient under the outer skin barrier 28. Implantable 
pulse generator 10 is electrically coupled to the heart 
of the patient using at least one cardiac pacing lead 12 
in a manner known in the art. Percutaneous telemetry 
data is transmitted from implantable pulse generator 10 

20 by an RF uplink 26 utilizing the improved telemetry 

format to a receiving antenna 22, which is coupled to a 
programmer 20 via a cable 24. Receiving antenna 22 also 
contains a magnet which activates a reed switch in 
implantable pulse generator 10 as a safety feature, as 

25 taught in U.S. Patent No. 4,006,086 issued to Alferness 
et al., herein incorporated by reference. The telemetry 
data is demodulated and presented to the attending 
medical personnel by programmer 20. 

FIG. 2 is a schematic diagram of the protocol of RF 

30 uplink 2 6 using the improved telemetry format. The 
uplink uses a damped 175 kilohertz RF carrier which is 
pulse position modulated, as described in detail below. 
Shown at 30, the basic timing unit of the format is a 
frame, having a duration of t^. It will be understood by 

35 those skilled in the art, however, that the present 
invention can be practiced using fixed-length frames 
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having periods of shorter or longer duration. In the 
preferred embodiment, the main timing source of 
implantable pulse generator 10 comprises a standard 
32.768 kilohertz crystal clock which provides a basic 
5 clock cycle of 30.52 microseconds. Thus, a frame 

comprised of 64 clock cycles and extending over a fixed 
time interval of 1.953125 milliseconds is a convenient 
frame period, since such frame period is a binary 
multiple of the basic clock cycle. 

10 A unique synchronizing signal is positioned within a 

first fixed range of each frame 30. This signal 
comprises a synchronizing RF pulse 32 which is located at 
a time t nl within frame 30. To properly function as a 
synchronizing pulse, it must be located at a fixed point 

15 within the first fixed range of frame 30, as shown at 34. 
A four-bit frame identifier code is positioned 
within a second fixed range of each frame 30, such second 
fixed range comprising an identifier range 38. 
Identifier range 38 uses a total of eleven basic clock 

20 cycles as shown. This- identifier code comprises an 

identifier RF pulse 36 which is pulse position modulated 
within the identifier range 38. The position of 
identifier pulse 36 within identifier range 38 identifies 
the nature or type of data found within each frame 30 

25 which is being transmitted, such as peak sense, peak 
pressure, sense threshold and others, as described in 
further detail below. Shown at 40, time interval t^ thus 
uniquely represents the value of identifier pulse 36, 
which value in turn identifies the data type being 

30 transmitted within frame 30. 

Each frame 30 transfers one eight-bit byte of data 
along with the identifier code. This data is divided 
into two portions comprised of four bits of data each. A 
first portion of this data, namely the four least 

35 significant bits of the data byte, is positioned within a 
third fixed range of frame 30, such third fixed range 
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comprising a lower nibble range 44. A second portion of 
this data, namely the four most significant bits of the 
data byte, is positioned within a fourth fixed range of 
frame 30, such fourth fixed range comprising an upper 
5 nibble range 48. 

A lower nibble pulse 42 is pulse position modulated 
within lower nibble range 44, such that its value is 
uniquely identified by its location, such as at a time 
shown at 45. An upper nibble pulse 46 is also pulse 

10 position modulated within upper nibble range 48, such 
that its value is uniquely identified by its location, 
such as at a time shown at 50. Lower nibble range 44 
and upper nibble range 48 each comprise sixteen basic 
clock cycles, permitting each of the sixteen unique 

15 values of the four-bit nibble to be specified. To 

prevent data overlap, suitable guardbands are positioned 
between each of the ranges within the frame to uniquely 
identify the synchronizing pulses, thereby avoiding 
undefined and erroneous data transmission. 

20 pig. 3 is a diagram of two frames of RF uplink 26, 

wherein a first frame corresponds to Word 1 shown at 70, 
and a second frame corresponds to Word 2 shown at 72. A 
count of clock cycles is indicated along an upper 
horizontal axis of this diagram for each frame. Each 

25 basic clock cycle has a duration of 30.52 microseconds. 
The first frame at 70 is initiated by an RF pulse 52. A 
synchronizing RF pulse 54 is shown uniquely identified as 
precisely four clock cycles later. Because the 
guardbands are all greater than four clock cycles, no 

30 combination of a frame identifier and data can appear as 
a synchronizing pulse. Synchronizing pulse 54 is used to 
provide frame synchronization between the transmitter 
(i.e., implantable pulse generator 10) and the receiver 
(i.e., programmer 20). 

35 An identifier RF pulse 56 is located within 

identifier range 38, which range is defined as nine to 
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nineteen basic clock cycles from the beginning of frame 
70, In Word 1, for example, identifier pulse 56 is 
located at clock cycle nineteen. This identifies the 
frame as a particular type of data transfer, namely, 
5 "Sense Threshold" as indicated in Table 1 below. 



TABLE 1 



20 



Position 


Identification 


9 


Memory 


10 


Idle 


11 


EGM-1 


12 


Markers 


13 


Peak Sense 


14 


Pressure Waveform 


15 


Peak dp/dt 


16 


Peak Pressure 


17 


Delta Capacitor Voltage 


18 


Activity Counts 


19 


Sense Threshold 



A lower nibble RF pulse 58 is located within lower 
nibble range 44, which range is defined as twenty-four to 
thirty-nine basic clock cycles from the beginning of 
frame 70. In Word 1, for example, lower nibble pulse 58 

25 is located at clock cycle thirty-one, specifying a binary 
value of seven on a scale of zero to fifteen. An upper 
nibble RF pulse 60 is located at clock cycle fifty-eight 
within upper nibble range 48, which range is defined as 
forty-four to fifty-nine basic clock cycles from the 

30 beginning of frame 70, and is demodulated in similar 
fashion. 

FIG. 4 is a block diagram of that portion of 
implantable pulse generator 10 which is associated with 
formatting and transmission of RF uplink 26. Most of the 
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unique hardware which embodies the present invention is 
located on a single substrate, being a custom chip device 
indicated generally by arrow 105. The remainder is 
microprocessor-based logic indicated generally by arrow 
5 100, comprising microprocessor 102, random access memory 
(RAM) 104, and parallel bus 106. The function of 
microprocessor-based logic 100 is described in further 
detail below. 

Chip 105 has an' analog-to-digital (A/D) converter 

10 108 which receives a number of analog inputs 110 from a 
multiplexer (not shown) . A/D converter 108 permits data 
to be transferred via RF uplink 26 to be digitized as 
necessary, so that all data is transmitted in a 
standardized digital form. 

15 Circuitry (CRC) for generating and analyzing the 

cyclic redundancy code used to forward error detect 
telemetry data transmitted over RF uplink 26 is indicated 
at 112. In the preferred embodiment, it is also used for 
data received by implantable pulse generator 10 via a 

20 downlink (not shown) . Circuitry (DMA) for providing 

direct memory access to RAM 104 is indicated at 114, thus 
permitting multiple byte transfers without constant 
management by microprocessor 102 . 

Key hardware used to implement RF uplink 2 6 

25 comprises telemetry control and data buffer circuitry 
indicated generally within dashed lines at 121, which 
circuitry includes data buffer 116 and telemetry control 
120, and up-link timing circuitry 118. Data buffer 116 
includes storage for twelve bits of data. This storage 

30 is partitioned into a four-bit section 119 for storage of 
the frame identifier code, and an eight-bit section 117 
for storage of the lower nibble and upper nibble of a 
frame. Data buffer 116 thus stores all of the variables 
for one complete frame. Data buffer 116 is used to stage 

35 the variables for the frame which may be received from 
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RAM 104, A/D converter 108 , CRC 112, or elsewhere along 
parallel bus 106, 

Telemetry control 120 consists primarily of a 
telemetry status register. This register stores the 
5 telemetry commands and status as loaded by microprocessor 
102. The contents of the register are thus used to gate 
the data at the proper time of the defined protocol. 

Up-link timing 118 decodes the twelve bits of data 
stored in data buffer 116 to produce a set of timing 

10 signals which key bursts of RF energy at the appropriate 
times to pulse position modulate the 175 kilohertz 
carrier. Up-link timing 118 also keys bursts of RF 
energy at the fixed positions within the frame 
corresponding to the frame-initiating pulse and the 

15 synchronizing pulse. 

FIG* 5 is a basic flowchart showing the overall 
function of the microprocessor-based logic 100. The role 
is essentially one of initiation of the transfer, rather 
than management of each detail of the transmission. 

20 Software associated with RF uplink 26 is started at 

element 130, usually by a down-linked command to transfer 
data. 

Element 132 schedules the requested transmission via 
the up-link facilities.. This scheduling prioritizes 
25 uplink transmission requests. Lower priority is given to 
continuous real time transfers, such as EGM and battery 
voltage, whereas higher priority is given to single 
occurrence transmissions of status information. 

After scheduling, element 134 determines whether an 
30 uplink transmission is currently in progress. If an 
uplink transmission is in progress, element 132 re- 
schedules the request. 

If an uplink transmission is not in progress after 
scheduling, element 136 initiates the uplink transmission 
35 by activating telemetry control 120. Exit is via element 
138. While some additional management of the process is 
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required during the transmission, a description of such 
further details has been omitted, since it is not 
believed necessary to one skilled in the art to fully 
understand the present invention. As to the software 
5 associated with the uplink transmission, however, a 
source code listing of the pertinent sections of such 
software has been attached hereto as Appendix A, and is 
incorporated by reference herein. 

FIG. 6 is a block diagram showing the major data and 

10 control signals of telemetry control and data buffer 121 
(which includes data buffer 116 and telemetry control 120 
shown in FIG. 4), and also of up-link timing 118, A 
primary function of data buffer 116, as indicated above, 
is the staging of the twelve variable bits of a given 

15 frame which correspond to a four-bit frame identifier ID, 
and dual-nibble data comprising a four-bit lower nibble 
LN and a four-bit upper nibble UN* The data is received 
over an eight-bit, parallel bus 159 and can be from any 
one of several sources. Control lines EGMDATA at 150, 

20 PRSDATA at 151, DLDMA at 153, DMADS at 155, LDANDAT at 
156, ENCRC at 161 and LDCRC at 171 specify the source. 
The output of A/D converter 108 of FIG. 4 is presented 
separately to data buffer 116 as an eight-bit parallel 
transfer to ADC(0-7) at 154 (see FIG. 6). The output of 

25 CRC 112 is presented separately to data buffer 116 as an 
eight-bit parallel transfer to CRC (0-7) at 160, since 
those devices are located on the same substrate. 

Telemetry control 120 outputs a number of control 
signals, including EGMGAIN at 162, RVPGAIN at 163, 

30 EGMTELEN at 164, ANULON at 165, RAMULON at 166, MEMEN at 
167, PRSTELEN at 168, HDRCRCEN at 169 and EGMNPRS at 170. 
These control outputs are used to enable and control 
inputs to data buffer 116. The key outputs of telemetry 
control and data buffer 121 are TELRST at 182, which 

35 resets up-link timing 118 and initiates the beginning of 
a frame, and a parallel data transfer at 184, which 
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transfers the frame identifier ID, lower nibble LN and 
upper nibble UN to up-link timing 118. 

Up-link timing 118 receives the frame-initiating 
control signal TELRST at 182 and the parallel data 
5 transfer (ID, LN and UN) at 184. A primary function of 
up-link timing 118 is to key the transmission of 175 
kilohertz RF energy at the proper times to indicate start 
of frame, frame synchronization, frame identifier, lower 
nibble and upper nibble. Timing for this function is 

10 provided by the 32.768 kilohertz crystal clock to up- 
link timing lis with clock signal XTAL at 186. An output 
TELCLK is provided at 188 which keys the actual burst of 
RF carrier at the proper times. 

PIG. 7 is a block diagram of up-link timing lis. A 

15 frame timing generator 202 provides the desired timing 
for a frame according to clock input XTAL at 186, in a 
manner hereinabove explained. Thus, each frame is 
comprised of sixty-four basic clock cycles. The process 
is initiated by receipt of the frame- initiating control 

20 signal TELRST at 182, which enables uplink when in a low 
state and disables uplink when in a high state. The 
initial clock cycle of a frame contains a burst of RF 
energy which is keyed by control signal TELCLK at 188, 
which is also used to trigger the start of the data 

25 decoding by an uplink word multiplexer 200. 

After the proper four-bit quantity is selected 
(i.e., frame identifier ID first, lower nibble LN next, 
and upper nibble UN last) , a telemetry pulse timer 204 
determines the appropriate timing for a burst to be 

30 provided to frame timing generator 202, and a 

corresponding burst of RF energy is keyed. Each of the 
four-bit quantities thus results in the keying of a burst 
of RF energy at the appropriate time within each frame. 
FIG. 8 is a circuit diagram for the drive circuit 

35 for generating the RF carrier. A control signal TELCLK 
at 188 provides the timing information for keying the 
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carrier. A non-overlap generator 220 functions as a 
delay device to save current by preventing output 
transistors 230 and 232 from conducting simultaneously. 
Every transition of control signal TELCLK at 188 causes 
5 one transition by non-overlap generator 220 ♦ Inverters 
222, 224, 226 and 228 are scaled to provide efficient 
switching with sufficient drive to the gates of 
transistors 230 and 232. Transistors 230 and 232 drive 
the signal off of chip 105 to ANTDR at 234 to an antenna 
10 circuit. A tuned circuit of discreet components, 

capacitor 23 6 and coil 238, are located external to chip 
105. Each transition thus causes this tuned circuit to 
resonate at 175 kilohertz, thereby generating one uplink 
burst. 

15 While the invention has been described above in 

connection with the particular embodiments and examples, 
one skilled in the art will appreciate that the invention 
is not necessarily so limited. It will thus be 
understood that numerous other embodiments, examples, 

20 uses and modifications of and departures from the 
teaching disclosed may be made as to various other 
systems for telemetering data to and from an implantable 
medical device, without departing from the scope of the 
present invention as claimed herein. 
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ext_t Impact ive EOU 5 
nag stale EOU 6 



rr_ trans EOU 7 

TlXJtOWHAGJISJC EOU 10110000B 



;Extended telemetry is active 
;Magnet state, node and rate are 
;set to VOOJWOE and mag rate following 
; permanent programming. 
;Rate response transition 

;Haslc to clear all telemetry 
; flags except those associated 
;with extended telemetry. 



tlm2_flags 
perm_prog_ve I id EQU 0 
reset_inhibtt EOU 1 
reset_pece_t rigger EOU 2 
pk_sense_rqst EOU 3 

up Ink cnfrm EQU 4 



;Valfd Permanent programming 
; occurred. 

;Reset inhibit featured 
; - used in validate message 
;Reset pace trigger featured 
; - used in validate message 
;5ingle Peak sense measurement 
; requested from programmer 
;Uplink confirmation required 
; on next event. 



UUD 



CRC.error EOU 5 ;CRC error indicator 

up inkjnemory EOU 6 ;Uplink include memory block 

uplinkttC EOU 7 ;Uplink includes CRC and header 



Uplink_flags 



uplnk_disabled 


EQU 


0 


uplink_bsy 


EOU 


1 


up_rera_pnd 


EQU 


2 


up_stat_pnd 


EQU 


3 


intrrg^pnd 


EQU 


4 


tcapjnrkr_pnd 


EQU 


5 


mrkr_pnd 


EQU 


6 


me«s_pnd 


EOU 


7 


UPLHK_GH_SET 


EOU 


(2 



;Uplink is disabled 
; Up I ink channel is busy 
;RAM uplink pending 

interrogate data uplink pending 
;loss of capture marker uplink 
; pending 

; Event marker uplink pending 
;Heasured value uplink pending 



.•Disable upltnk~and set busy 



Uplink_stet equates 



page0_write 
megne reapplied 
ehecksum_error 
POR_oc cured 

UPIKK_CLRJI$IC 

UPLNIC POR MSK 



EOU 


4 


EOU 


5 


EOU 


6 


EOU 


7 


EOU 


11110000B 


EQU 


110000008 



;Urite oc cured on page 0 
;Reed switch is closed 
;Ram checksum error flag 
;POR flag 

;Clear error bits in uplink 
;stat 

;Init mask used during POR 



Downlink Control Byte equates 
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494 












495 


9 










496 


• * 

t 


Telemetry equates 






497 


t 










498 


t 










499 
500 












« 










501 


.* 

* 


Marker values 






502 


» 










503 










=0064 


504 


MC REFRAC SENSE ECU 


66H 


;Ventrical refractory sense mker 


=00EE 


505 


MK_SEHSE 


EQU 


0EEH 


; Ventrical sense marker 


=O0CC 


506 


pirp 

nA_r Aw C 


EQU 


0CCH 


; Ventrical pace marker 


— nfi77 
— uu# / 


3Uf 


M)C LOC 


EOU 


77H 


;Loss of capture marker 
;Triggered pace marker 




3uo 


miTt r1gcered 


EOU 


0ODH 




500 








'0080 


510 


iid ror* 


EQU 


BOH 


; Uplink CRC val for UL1D regist 


xOOOO 




Ur NLVRt 


EQU 


0 


;Uplink no CRC val for UL1D reg 


=0040 


512 


UP^HEH 


EQU 


40K 


;Uplink mem val for ULID regist 


=0000 


5 lj 

Mb 
516 


UPJiCHEH 
J 


EQU 


0 


; Up I ink no mem val for ULID 
; register 




■517 


; ID code and 


CRC bits for uplink messages 




51B 

3 IO 










=0080 


519 


STATUS ID 


EQU 


0 ♦ UP CRC ♦ UP NOW EH ;Conf irroation ID 


— ftftrft 
=DULU 




RAM ID" 


EQU 


0 ♦ UP~CRC ♦ UP~HEM ?RAM uplink ID 






MARKER ID 


EOU 


3 ♦ UP~HOCRC ♦ UP HEK ;Harker channel ID 






PKSEHSEJD 


EQU 


4 ♦ UP HOCRC + UP~MEH ;Measure value IDs 


'0046 


523 


PKDP0T TD 


EQU 


6 ♦ UP~HOCRC + UP~HEH 


=0047 


524 


PKPRESS ID 


EOU 


7 ♦ UP HOCRC + 


UP MEM 


=0048 




DLTAVOLT ID 


EQU 


8 ♦ UP HOCRC ♦ UP HEK 


=0049 


526 


ACTCHT ID 


EOU 


9 ♦ UP HOCRC ♦ UP~MEK 


=004A 


527 


5EWSTHRS_ID 


EQU 


10 ♦ UP JIOCRC 


+ UP_HEH 




528 












529 

33U 






















3 J 1 
33£ 


• * 

* 


Misc. 


telemetry equates 
















3J3 










=00C3 


534 


ACCESS CODE 


EOU 


0C3H 


;Telemetry access code for IPG 


=O0B3 


535 

3JO 


RH_M00ELJD 


EQU 


10110011B 


; IPG model i.D. value, model 844J 


=0027 


537 


IHTRRG_S12 


EQU 


39 


;Size of interrogate block 


—Anon 


539 


MAX^MEMREAD 


EQU 


128 


jMaxtnun memory block read size 


=000 F 


540 


PG0 


EQU 


OFH 


;Control byte Page 0 ID 


xnnni 

*UUU 1 


5Z.1 
3*» 1 


PC7 


EQU 


1 


; Control byte Page 7 ID 


=0002 


542 


PG8 


EQU 


2 


;Control byte Page 8 ID 


=0004 


543 
544 


PC10 


EOU 


4 


; Control byte Page 10 ID 


=0003 


545 


DNU EXTRA LEX EQU 


3 


;Hessage overhead (sub from 




546 








;IIW by t count) 


=0001 


547 
548 
549 


DHUC_CBJHDX 


EOU 


1 


;First val field in downlink 
; message 




550 


; Emergency values 








551 










=0041 


552 


EMG Ptf 


EQU 


41K 


; Emergency Pulse Uidth (2ms) 


=0018 


553 
554 
555 


EMG_AMP 


EQU 


18H 


; Emergency pulse eoplitude 
;{6.0 Volts) 


=0023 


556 
557 


HIGHJtATE 


EQU 


23H 


; Highest rate that will allow 
;full RAM uplink (170ppn) 


=001 E 


558 
559 
560 


UPLIHKJ>ELAY 


EOU 


1EH 


;KinimLm time before next 

; scheduled event 

; needed for RAM uplink (300ms) 


=0003 


561 


UP5TAVDELAY 


EOU 


03H 


;Hinioun time before next 
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254 .••••*•••••**••***«••••«•*•*••*••••*•••****•***«**«•*••******•*•*••*••• 

265 POR end Executive Macros 

266 ;•••••••••••••**•••*•••••••*•••••••••••••••••••••••••••••#••••••••••••• 

267 

268 CHECK MARKER UPLINK ••••••*••••••••••••••••••• 

269 ;9* 

270 ;3* Determine which marker code to uplink while in magnet mode or * 

271 ;3+ extended telemetry. If RAM uplink is in progress, the marker * 

272 ;3* will be igonred. 

273 ;3* 

274 ;3* EMTRY CONDITIONS: * 

275 ;3* A pace/sense or refractory sensed event is being processed. * 
276' ;3* PACESTAT indicates if the event was refractory. * 

277 ;3* 

278 ;3* EXIT CONDITIONS: » 

279 ;&* If maker channel is active and a valid marker is detected; * 

280 ;3* a marker is up I inked. * 

281 ;3* 

282 ;& •••••••• .ft**.*.**.....********...*****...*...* 

283 

2W ; 

285 ;9 MACRO CHECK MARKER UPLINK 

286 ;a BEGIN 

287 ;3 (* check for marker uplink *) 

288 ;3 IF (markers active, of mag flags) THEN 

289 ;3 BEGIN 

290 ; 

291 ;CHECK MARKER UPLINK XMACRO 

292 jCMU — START 

293 ; " ?Jtnp if marker channel NOT active 

294 ; 8RCLR markers active, mag flags, CMU END 

295 ;; - ~ - 

296 ;;3 IF (<ref ractory^evnt of PACESTAT) 

297 ;;S AND (sensed'evnt of exec flags)) THEN 

298 ;;3 BEGIN (* Refractory sensed event *) 

299 ;;3 If ((timeout int - event time) > 1) THEN 

300 ;;3 x :* MK REFRAC SENSE; ~ 

301 ;;a ELSE 

302 ;;3 EXIT; 

303 ;;3 END; 

304 ;; 

305 ; ;Junp if NOT refractory sensed event 

306 ; BRCLR refractory evnt , PACESTAT , CKU WT 

307 ; BRCLR sensed_evnt , exec J lags, CMUJ/YT 

308 ; LDA tfmeouTjnt 

309 ; SUB event_t7me 

310 ; CMP #1 ;ls there enough time for marker uplink? 

311 ; 8LS CMU END ; No, just exit 

312 ; LOX «Mk2rEFRAC_SENSE 

313 ; BRA OtTuL " ; Yes, load marker and go uplink it 

314 ;; ' 

315 ;;fi ELSE IF ((paced evnt of exec flags) AND 

316 ;;3 (sensed evnt of exec~flags)) THEN 

317 ;;3 BEGIN 

318 ;;3 (* WT mode, if triggered event send a triggered marker, 

319 ;;3 unless output is inhibited then send sense marker. •) 

320 ;;3 

321 ;;S IF NOTC Inhibit of tint flags) THEN 

322 ;;3 x :« MK TRIGGERED; " 

323 ;;S ELSE 

324 ;;3 x MK SENSE; 

325 ;;3 END; 

326 ;; 

327 ;CMUWT 

328 ; ~ Nunp if NOT both pace and sense 

329 ; BRCLR paced evnt, exec flags, CMU CKPACE 

330 : BRCLR sensed^evnt ,exec.f lags,CMU_CKPACE 

331 ; ~ ;Check for output inhibited 
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332 ; BRCLR inhibit_enabled, t Im flags, C«J IMHBT 

333 ; LDX *K_SENSE ;!f not, get swe marker 
33* ; BRA CHJJJL ;Go uplink it 

335 ;CHJ INHBT 

lit : " L0X ^.TRIGGERED ;Else get triggered marker 

337 % BRA OfJUL ;And tend it 

338 - 

339 ;;S ELSE IF ((paced.evnt of exec flags) 

3*0 ;;3 AND (NOT(inhibit of~tlm flags))) THEN 

3* 1 ;;1 (• If pacing it not inhibited, "send a PACE marker. •) 

**2 ;;5 x :« HK PACE; 

343 ~ 

344 ;DW_CKPACE 

3*5 ; ; jtfip if NOT paced or if inhibited 

3*° J BRCLR paced_evnt,exec_flags,CHU CKSENSE 

547 ; BRSET inhibit enabled7tlm ftagsTofJ CKSENSE 

3*8 ; LDX *4KJ>ACE ;EUe get marker code 

3*9 ; BRA CTUUL ;And send it 

350 ;; T 1 

351 ;;3 ELSE IF (sensed evnt of exec flags) THEN 

352 ;;3 x ;* HK SENSE; 

353 ;;8 ELSE 

35* ;;2 (* No marker to uplink exit macro *) 

355 ;;3 EXIT; 

356 ;; 

357 ;CMU_CKSENSE 

358 ; ;Jurp if not sensed event 

359 ; BRCLR sensed evnt, exec flags, CHU END 

3*0 ; LDX t*K_SENSE ;Else get marker value 

361 ;;•••""•"*•"""""*"-"*-**--•-•-**'»••*--»--••-•*-.».-*-•-»-»-...,...»..»». 

362 ;;S (* Uplink marker code •) 

363 ;;S CALLH UPLlNK_MARKER(x); 

364 ;;S END; (* marker'channel active *) 

365 ;;a 

366 ;; 

367 ;CHUUL 

368 ; UPLIHKHARKER ;Ulink marker (value in x) 

369 ;CHU END 

370 ; " XENDH 

371 ; 

372 ;S END; {* CHECK MARKER UPLINK *) 

373 ; - - 

374 

375 SEJECT 
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480 
481 
482 
4U 
464 
48S 
486 
487 
488 
489 
490 
491 
492 
493 
494 
495 
496 
497 
498 
499 
500 
501 
502 
503 
504 
505 
506 
507 
508 
509 
510 
511 
512 
513 
514 
515 
516 
517 
518 
519 
520 
521 
522 
523 
524 
525 
526 
527 
528 
529 
530 
531 
532 
533 
534 
535 
536 
537 
538 
539 
540 
541 
542 
543 
544 
545 
546 
547 



a** 

a* 

a* 
a* 

a* 
a* 
a* 
a* 
a* 
a* 
a* 
a* 
a* 
a* 
a** 



UPLINK MARKER 



This macro uplinks event markers if the channel is free. 

ENTRY CONDITIONS: 

This routine expects x to contain the marker value to be 
up linked. 

EXIT CONDITIONS: 

If the uplink channel is available it is captured and the 
marker is uplinked. If the channel is busy and there are 
no pending markers the marker is flagged pending for uplink 
at the end of the current uplink* 



UPLINK MARKER XHACRO 



8 MACRO UPLINK MARKER; 

a BEGIN 

a disable interrupts; 

a (• check if uplink channel is available •) 

a IF NOTCuptnk disabled of uplink flags) THEM 

a BEGIN 

a IF NOT(uplink.bsy of uplink flags) THEN 

a BEGIN 

3 (* If Uplink channel is free then uplink marker *> 

a uplink_bsy of upl ink_f lags :■ TRUE; 

3 enable interrupts; ~ 

a marker val :* x; 

a TElADHl := H!ADDR(marker val); 

a TELADLO :* LOADDR<marker"val); 

3 BTT COUNT x» 1; 

3 ULID MARKER ID; 

a RAM uplink of TELSTAT :* TRUE; 

a END; 



UPM START 



UPLHARKER 



5EI 
BRSET 



BRSET 



;Disable interrupts 
;Jump if uplink disabled 
uplnk_disabled,upl ink_f I ags t UPLMDONE 

;Junp if uplink BUSY 
upl i nk_bsy t up I i nk_f lags, UP t_B SY 



Uplink HOT busy 



BSET 

CI I 

STX 

IDA 

STA 

IDA 

STA 

IDA 
STA 

IDA 
STA 

BSET 
IRA 



;Flag uplink busy 
upl tnk_bsy,upl ink_f lags 

; Enable interrupts 
marker val ;Put marker value in buffer 
fHIGH marker val ;Get MSB of buffer address 
TELADHI " ;Urite it to hardware 
#LCW marker val ;Get LSB of buffer address 
TELADLO " ;Etc. 



#1 

BYT COUNT 



;Get output count 

;Vrite to hardware count register 



•MARKER 
ULID 



ID 



;Get ID code 
;Tell the hardware 
; Start the uplink 
RAM uplink, TELSTAT 
UPLMDONE 



ELSE 
BEGIN 
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548 ?? a <* If no markers are pending the flag one pending •> 

5*9 ;;3 mrkrjxti of tplink flags :« TRUE; 

550 ;;3 marker val :« x; 

551 ;;3 EMD; 

552 EKD; 

553 ;;3 enable interrupts; 

554 ;;Q 

555 ;; 

556 ;; Uplink BUST 

557 ;; 

558 ;UPL_8SY 

HI ' ~ BS£T «rkr_pnd > upMnk - flags ;Flag marker pending and 

™ STX »arker_val -store marker in the buffer 

561 ; 

562 ;UPLK>OHE 

ffj CLI ;Enable interrupts 



564 ; XEHDK 

565 ; 

566 ;S END; (* UPLIHK MARKER *) 

567 ; 7 

568 

569 SEJECT 
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1816 UPLINKJNTRRC **•* 

1817 ;3* " * 

1818 ;3* This macro uplinks the interrogate block of size INTRR6_SI2 and * 

1819 ;3* starting at the address pointed to by 1NTRRGJU) if the uplink * 

1820 ;&* channel is free. Otherwise, if there ts no RAH uplink, the * 

1821 ;?* Interrogate block is set pending and is scheduled via the next * 

1822 ;S* TEL8F interrupt, occurring when the uplink channel becomes * 

1823 ;S* free. All other uplinks have to be disabled while checking the * 

1824 ;9* uplink flags to avoid contention of the uplink channel. * 

1825 ;3* 

1826 ;8* EKTRT CONDITIONS: 

1827 ;3« None. * 

1828 ;S* 

1829 ;3* EXIT CONDITIONS: * 

1830 ;ff* None. 

1831 ;8* 

1832 .^.•••.•••*****««*-***«***«*«««***«*******»«*««*»**»*************** 

1833 

isw ; - 

1835 ;8HACR0 UPL1NKJNTRRC; 

1836 ;8BEGIN 

1837 ;S (• Capture uplink channel • If busy set interrogate pending *) 

1838 ;3 disable interrupts; 

1839 ;3 IF NOTCuplnk disabled of uplink_flegs) THEN 

1840 ; 7 * 

1841 ; UP LINK INTRRG XMACRO 

1842 ; " SEI ;Dissable interrupts 

1843 ; 8RSET up Ink disabled,upl ink flags,UI_END 

1844 ;; 7 T 

1845 ;;3 BEGIN 

1846 ;;8 IF NOT(uplink_bsy of uplink_f tags) THEN 

1847 ;;3 BEGIN 

1848 ;;3 uplink_bsy of uplink_flags ;* TRUE; 

1849 ;;3 enable*interrupts; 

1850 ;;3 statbyt ;* uplnk_stet; 

1851 ;;3 CALLH LOAD INTRRG UPLINK WITHIN R2LIB; 

1852 ;;3 RAM uplink'of TELSTAT :« TRUE; 

1853 ;;S END; " 

1854 ;; 

1855 ; BRSET uplinkJ>sy,upUnk_f lags.UI JJBSY 

1856 ; BSET uplink_bsy,uplink_f lags 

1857 ; CLI ;Enable interrupts 

1858 ; LDA uplnk_stat 

1859 ; STA statbyt ;Initialiie the uplink status byte 

1860 ;UI LIU 

1861 ; " LOAD 1HTRRGJJPLIHK 

1862 ;UI LIU EN0 

1863 ; " " BSET RAM uplink, TELSTAT 

1864 ; BRA UI END 

1*65 ;? ~ " 

1866 ;;S ELSE 

1867 ;;9 intrrg_pnd of uptink_flags t« TRUE; 

1868 ;;5 END; 

1669 ;; 

1870 ;UI UBSY 

1871 ; " BSET intrrg_pnd,uplink_f lags 

1572 ;; 

1873 ;;3 enable interrupts; 

1874 ;;» 

1875 ;; 

1876 ;UI END 

1877 ; " CLI ;Enable interrupts 

1878 ; XENDM 

1879 ; 

1880 ;8END; (* UPLINK INTRRG •) 

1881 ; 

1882 

1883 SEJECT 



WO 91/10471 



-22- 



PCT/US91/00309 



Avocet 6805 Assembler v2.20, #01002 Chip»146805 to/i?/™ nfi-u-vi 

.*»,.«». R2 LSCAP INTERRUPT K00ULE File: LOC.ASH p«. 10 

rsr3XE=::c SRevision: 3.0 $ tciziscttstts 5 " 



409 UPLINK I CAP MARKER **•****•♦****••*»* 

410 ;9* ~ * 

411 ;S* This macro uplinks tots of capture markers. * 
412 

413 ENTRY CONDITIONS: 

414 ;8* Under magnet operations, the LSCAPINT interrupt is used for * 

415 the uplink of IOC Markers if the channel is free. • 

416 ;3* 

417 ;S* EXIT CONDITIONS: 

418 ;9* None. 

419 ;9* 
420 

421 

422 ; 

423 ;S MACRO UPLINK LCAP MARKER; 

424 ;3 BEGIN 

425 ;3 

426 ;S disable interrupts; 

427 ;3 If NOT (uplnk disabled of uplink flags) THEN 

428 ; r n,....r..„: 

429 ; UPLINK LCAP MARKER 3EHACRO 

430 ;ULK_START 

431 ; SEI ;Di sable interrupts 

432 ;ULHJNT 

433 ; " ;Jump if NOT (NOT uplnk disabled) 

434 ; BRSET uplnk_disabled,uplink_f lags,ULHJ)ONE 

435 ; 

436 ;; 

437 ;*a BEGIN 

438 ;;3 IF NOT(uplinkJ>sy of uplink flags) THEN 

439 ;; 7 

440 ;Jump if uplink busy 

441 ; BRSET uplink_bsy, up I ink flegs.ULM LCP 

442 ; * ~ 

443 ;; 

444 ;;3 BEGIN 

445 ;;3 (• If Uplink channel is free then uplink marker *} 

446 ;;■> uplink_bsy of uplink_flags :* TRUE; 

447 ;;3 enable interrupts; 

448 ;;3 TELADHI := HIA00RCLCAP MARKER); 

449 ;;S TELADLO ;» LOADOR ( LCAP*MAR KER ) ; 

450 ;;S BYT COUNT :» 1; 

451 ;;a ULID := MARKER ID; 

452 ;;3 RAM uplink of TELSTAT := TRUE; 

453 ;;3 END; " 

454 ;; 

455 ; BSET uplink_bsy,uplinW lags 

456 ; CI! ;Enable interrupts 

457 ; LDA #HIGH Icapjnarker ;Cet address MSB 

458 ; STA TELADHI ;Vrite to controller register 

459 ; 

460 ; LDA #L0W leap marker ;Get address LSB 

461 ; STA TELADLO " ;Write to controller 

462 ; LDA #1 ;Get byte count 

463 ; STA BYT COUNT fWrite to controller 

464 ; LDA tttARKERJD ;Get ID 

465 ; STA ULID " ;Write to controller 

466 ; BSET RAM uplink, TELSTAT ; Start uplink 

467 ; BRA ULM DONE ;Thats all folks 

468 ; 

469 ;; 

470 ;;8 ELSE 

471 ;;8 BEGIN 

472 ;;B (* If no markers are pending the flag one pending *) 

473 ;;3 leap mrkrjsnd of uplink flags :* TRUE; 

474 ;;8 END; 

475 ;;3 END; 

476 ;; *. 
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477 ;UIH_LCP 

478 ; ;Junp if leap marker pending 

479 ; BSET leap mrkr_pnd f uplink flags 

480 ; 

"1 ?; - 

482 ;;3 enable Interrupts; 

4*3 ;; 

484 ;ULK_OOHE 

485 ; Ctl ; Enable interrupts 

486 * 

487 ; XEK0H 
488 

489 ; - 

490 ;S) 

491 ;9 EKD; (• UPLIMK LCAP KARKER *) 

492 ?a 

«3 ; 

494 

495 JEJECT 
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]** £ *.*.««!c«rri?i.?s^ 

190 



III UPLINK MEAS VAL *****•**#.#.*..«*.•...« 

192 ;8* - 

194 -8* MCr ° 5 ' t0 Upllnk ■* asured v al«s - 

195 ;8* ENTRY CONDITIONS: 

197 l h t *7 ay "f?V al haS loaded wtth th * appropriate 

iya f n the x register. 

199 ;9* 

200 ;9* EXIT CONDITIONS: 

L J." 8 Tr™ 1 buffer f * "P"^- » the uplink channel 

fS. i? busy " !th ' **" «* lfnk th * «»sured values are 

205 i£ vl? Cart,e<, • ^ her !i" ff the ch »™ el <s ^ the mured 

206 ;3* TELBF interrupt. 



207 ;8» 

208 ;8* 



209 

210 ; 

211 ;3 MACRO UPLINK HE AS VAL(X); ' 

212 ;a BEGIN 

213 ;3 IF NOT(uplnk_disabled of uplink flags) THEN 

214 # ....T.»... 

215 ;UPLINK*EAS VAL XHACRO 

216 ;UHV_START 

l\l [ BRSET UPlnk.dlMbted.upMnk.flaBs.UHV.EHD 

219 ); 

220 ;;2 BEGIN 



1^ J |f [I NOT(uplink.bsy of uplink.flags) THEN 



Wl I . ;JUT P if UPHnk busy 

^ BRS£T wpl «nk_bsy,upl ink_f lags,UHV_SHV 



226 

227 ;;3 BEGIN 



III ::2 C V? l!r * Ch8nnel free «P lfnk wasured value buffer 

'»? upUnk_bsy of uplink flags := TRUE; 

" 3 TELADHI :* HIAODRCmeas valfOJ); 

SI *' ' TELAOLO L0ADDR(meas"val TO] ); 

232 ;;a BYTCOUNT :* x; 

233 ;;3 ULID := meos id; 

Ht ;;3 RAM_upttnk of TEL STAT :r TRUE; 

235 ;;3 MO; 



236 



«p ' BSET upUnk_bsy # uplink_flags ;Set uplink busy 

"J ' LDA 'HIGH meas_val ;Get buffer address MSB 

HI { STA TELADHI ; urite DMA address register 

\\\ ' LDA *LOV meas_val ;Cet buffer address LSB 

2« ; STA TELADLO -etc. 

2« ; STX BYTCOUNT ;Ur ite byte count 

i,Z ' L0A neasjd ;Cet ID 

HI • STA UUD ."Write to hardware 

l)% 7 B5ET RAM_upUnk,TELSTAT ;Start uplink 

UJ ; BRA UHV-END ;Goexit 

249 J; 

250 ;;a else <* not uplink bsy •> ' 

251 ;;3 BEGIN 

HI ;#' a C* Set measured value uplink pending *) 

253 ;;8 meas_count :» x; 

254 ;;3 meas^pnd of uplink flags :« TRUE* 

255 ;;8 END; 

256 ;;8 END; 

257 ;; 

258 ; 
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259 ;UMV SMV 

260 ; 

261 ; 

262 ; 

263 ;UKV END 

264 ; 

265 ; 

266 ;3 EHD; (* UPLINK ME A 5 VAL *) 

267 ; «...r 

268 

269 SEJECT 



STX me* tycoon t ;S»ve pending byte count 

SSET mess _pnd, uplink flags ;Shou pending upling 

BRA UKV_EWD ;Thats all folks 

3CEWDM 
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378 
379 
360 
381 
382 
383 
384 
385 
386 
387 
388 
389 
390 
391 
392 
393 
394 
395 
396 
397 
398 
399 
400 
401 
402 
403 
404 
405 
406 
407 
408 
409 
410 
411 
412 
413 
414 
415 
416 
417 
418 
419 
420 
421 
422 
423 



a** 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 

a* 



TLH 



R2, Pacemaker Model 8444 
HOOULE: TLH 

The TLH module processes magnet mode operations while the reed 
switch is closed* These include the handling of the telemetry 
protocol, the TMT and lead test activation, the pulse pressure 
calculation for loss of capture Barkers detection. The 
telemetry protocol involves processing downlink and uplink 
messages. Downlink messages are validated before being acted 
upon. The uplink consists of confirmation and confirmation + 
replies to downlink requests. 

Routines defined in this module include: 



Macros: 

0O_HEHURITE 

EXEC_SPEC_FUNC 

EXEC_SPECJtEQ 

PROCESS JiEHURlTE 

PROCESS_HSG 

SUI TCH_TO_N0H_HAGM0OE 

VALIDATEJISG 

Procedures: 
Hone. 

Drivers: 

GMLSIHTJ>RQC 
RDSU*IHT>ROC 
TELBFINT PR0C 



transfer downlink record to 
memory 

decode and execute special 
function 

decode and execute special 
requests 

transfer downlink record to 
memory and evaluate it 
decode memory offsets 
restore nonjnagnet mode 
operation 

validate downlink message 



gain or loss interrupt handler 
reed- switch interrupt handler 
telemetry buffer interrupt 
handler 



Q***************** ******************** ************* ******* *********** 



DEFSEG 
SEG 

SSETLNCHACROS.INC); 



TLH,CLASS=CODE 
TLH 



X! HCLUDE "MACROS . I HC" 
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424 

425 SKOAL L PUBLIC 

426 SSETLHC EQUATES. IMC); XINCLUDE "EQUATES. IMC" 
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1812 
1813 
1814 
1815 

1816 SEJECT 



Telemetry Subroutines 



5 
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0000& 09 00* 10 
0003& A6 03 
0005& B7 00* 
0007& 09 00* 02 
000A& 1A 00* 

000C& 14 00* 
000E& AE 04 
0010& BF 00* 
001 2& 4F 
0013& B7 00* 
0015& B6 00* 
001 7i A4 03 
0019& 27 02 
001B& 12 00* 



1817 
1818 
1819 
1820 
1821 
1822 
1823 
1824 
1825 
1826 
1827 
1828 
1829 
1830 
1831 
1832 
1833 
1834 
1835 
1836 
1837 
1838 
1839 
1840 
1841 
1842 
1843 
1844 
1845 
1846 
1847 
1848 
1849 
1850 
1851 
1852 
1853 
1854 
1855 
1856 
1857 
1858 
1859 
1860 
1861 
1862 
1863 
1864 
1865 
1866 
1867 
1868 
1869 
1870 
1871 
1872 
1873 
1874 
1875 
187c 
187T 
1878 
1879 
1880 
1881 
1882 
1883 
1884 



* Telemetry Interrupt Handlers 

******^******»**************************^^ 

a************************* GNSLINT PROC ***************************** 

a* 

This procedure is the gain/loss Interrupt handler and ft is 
non- preemptive. It is responsible for controlling the downlink 
and disabling uplink. Whether the interrupt Ss do to a gain or a 
loss of signal can be determined by reading a bit in the TELSTAT 
register. At the beginning of a downlink all pending uplinks are 
abandoned and the TELBF interrupt is masked out until the end of 
downlink. In which case it is reenabled, after being first 
cleared, in the case of downlink overrun. Downlink is then 
disabled until Just before the uplink response, either a status 
uplink or a RAH uplink. 



ENTRY CONDITIONS: 
No other interrupts are enabled at this point, ADC interrupts 
are the only higher priority and they are ignored during 
telemetry. 

EXIT CONDITIONS: 
None. 



3PROCEDURE GNLSINT* PROC; 
3BEGIN 

a 

(* Check if gain or loss of signal occurred. *) 
IF (downlnk_present of TELSTAT) THEN 
BEGIN 

(* Gain of downlink signal. Clear pending uplinks, disable 
uplink and TELBF interrupts, and clear any ADC and 
TELBFINT interrupts. 
uplink_f lags :» UPLNK GN SET; 
IF <TMT of magJlagsMHEN 

resetJTMT of~mag_f lags TRUE; 
TELBFINT of ipgstate msk := TRUE; 
IROREG TELBFINT MSK; 
ULID := 0; 



<* If POS currently executing then postpone loss-of-signal 

processing until after POS is complete. 
IF (Csensed_evnt of exec_flags) 

OR (paced_evnt of exec flags)) THEN 
GNLSINT of cur rent _pri :* TRUE; 

END; 



GNLSINT PROC 



GNLS NTHT 



BRCLR 

LDA 

STA 

BRCLR 

BSET 

BSET 

LDX 

STX 

CLRA 

STA 

LDA 

AND 

BEO 

BSET 



downlnk_present,TELSTAT,CNLS LOSS 
*UPLNK6N_SET 

uptink~flags ;Di sable uplink 

THT ,mag_f lags , GNLS JITHT 

reset_THT,tnag_f lags ;Reset THT if active 



TELBFINT, Ipgstate ms* 
#TELBFINT MSK 
IROREG 

ULID 

exec flags 

#(0~SHI sensed evnt) 
GNLS NPOS 

GNLslNT f current_pri 



;Mask TELBF interrupts 

;Clear TELBF interrupts 

;Clear ULID register 
;Is POS currently executing? 
(1 SKL paeed_evnt)) 
; No, then exit 
; Yes, postpone I oss-o* signal 
; until after POS 
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0010& CC 038U 



0020& 


00 


00* 


03 


0023& 


CC 


0384& 


00264 


OB 


00* 


03 


0029& 


CD 


0000* 


002C& 


B6 


00* 




002E& 


A4 


FO 




0030& 


B7 


00* 




0032& 


05 


00* 


OD 


0035& 


AE 


04 




0037& 


BF 


00* 




0039& 


16 


00* 




003B& 


AA 


09 




003D& 


B7 


00* 




003F& 


CC 


0350& 



1885 
1886 
1887 
1888 
1889 
1890 
1891 
1892 
1893 
1894 
1895 
1896 
1897 
1898 
1899 
1900 
1901 
1902 
1903 
1904 
1905 
1906 
1907 
1908 
1909 
1910 
1911 
1912 
1913 
1914 
1915 
1916 
1917 
1918 
1919 
1920 
1921 
1922 
1923 
1924 
1925 
1926 
1927 
1928 
1929 
1930 
1931 
1932 
1933 
1934 
1935 
1936 
1937 
1938 
1939 
1940 
1941 
1942 
1943 
1944 
1945 
1946 
1947 
1948 
1949 
1950 
1951 
1952 



GNLS NPOS 



JHP 



GNLS DONE 



;a 
;a 
;a 
;a 
;a 

;» 
;a 
;3 
;« 

;a 

;a 
;a 
;a 

;a 
;a 
;a 
;a 
;a 



ELSE IF (uplnk disabled of uplink flags) THEN 
BEGIN 

(* If the up lnk_di sab led bit was not set then a downlink 
overrun has occured (gain of signal was missed) and 
downlink should be ignored! I 

IF <reset_THT of mag flags) THEM 
CALL THT.RESET WITHIN R2LIB; 

uplnk_stat :« (uplnk_stat AND UPLNK_CLR_MS)C); 

IF (TELBFIHT of IRQREG) THEN 
BEGIN 

(* Downlink overflow - Flag error, uplink status, 

and clear TELBF interrupt *) 
IRQREG := TELBFIHT_HSK; 
up_stat_pnd of uplTnkjf lags := TRUE; 
uplnk stat := up Ink stat OR DNLK OVF ERR; 
END; 



GNLS LOSS 



GNLS LCONT 



GNLS HTKTRST 



BRSET uplnk disabled,uplink flags, GNLS LCONT 

JHP GNLSJDOHE 

BRCLR reset JTHT , mag_f I ags , GHLS_NTHTRST 

JSR THT_R£SET ;Go abort THT sequence 

Lt>A uplnk_stat 

AND #UPLNKj:LR_HSK 

STA uplnkltat" ;Hask error bits in uplink status 

BRCLR TELBFIHT, IRQREG, GNLS NOVF ;Has downlink overflow occurred? 

LDX #TELBFIHT MSK 

STX IRQREG 

BSET up stat_pnd, uplink flags 

ORA #DNLK_OVF_ERR 

STA uplnk~$tat 

JHP GNLS UPLNK 



;Clear TELBF interrupts 
;Set status uplink pending 

;Set and store Overflow error 



,-a ELSE 

;3 BEGIN 

;3 {* No downlink overflow 

;3 CALLM VALIDATE MSG; 

;3 END; 



GNLS NOVF 



;VALIDATE_HSG 

C* Request event time to be latched (write any value) 
NOTE: event time takes 0.244msec to be latched *) 
EVENT I HE :« 0; 

IF ((upJIAHjsnd of uplink flags) 

OR Tintrrgjsnd of uplink flags)) THEN 
BEGIN 

(* Only allow RAH uplink if the pacing interval is above 

HIGH RATE, otherwise clear uplink status flag. 
IF {timeout int < HIGH RATE) THEN 
BEGIN 

upJtAHjxxi of uplink_flags :* FALSE; 
intrrg_pnd of uplink^flags :» FALSE; 
up stat_pnd of uplink flags := TRUE; 
END;" 
ELSE 

up_stat_pnd of uplink flags :» FALSE; 

END; 
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03504 B7 00* 



03524 
03544 
0356& 
0358& 
035B& 
035D4 
035F4 
03614 
03634 
03654 



B6 00* 
A4 14 
27 11 
C6 0000* 
A1 23 
24 08 

15 00* 

19 00* 

16 00* 

20 02 



03674 17 00* 



03694 15 00* 
036B& C6 0000* 
036E4 BO 00* 
03704 A1 IE 
03724 22 07 
03744 07 00* 09 
03774 A1 03 
03794 23 05 

037B4 CO 0000* 
037E4 20 02 

03804 18 00* 



03824 15 00* 

03844 A6 01 
03864 B7 00* 

03884 81 



1953 
1954 
1955 
1956 
1957 
1958 
1959 
1960 
1961 
1962 
1963 
1964 
1965 
1966 
1967 
1968 
1969 
1970 
1971 
1972 
1973 
1974 
1975 
1976 
1977 
1978 
1979 
1980 
1981 
1982 
1983 
1984 
1985 
19B6 
1987 
1988 
1989 
1990 
1991 
1992 
1993 
1994 
1995 
1996 
1997 
1998 
1999 
2000 
2001 
2002 
2003 
2004 
2005 
2006 
2007 
2008 
2009 
2010 
2011 
2012 
2013 



GNLSJJPLNK 
GNLS UPEVNT 



; latch event time count 



GNLS RTLO 



GNLS NRAKUP 



STA EVENT I ME 

LDA uplink flags 

ANO #C(1 SHL up RAM_pnd) + (1 SHL intrrgjsnd)) 

BEG GNLSJIRAKUP* ;Jump if no RAM of interrogate uplink 

LDA timeout J nt 

CMP #H!CH RATE ;Is timeout less then upper rate limit? 

BHS CNLS_RTLO ; No, set uplink status flag false 

BCLR up_RAH_pnd,upl ink_f lags 

BCLR fntrrgjand.uplink^f lags 

BSET up statjsnd, uplink flags 

BRA 6NLS_NRAMUP 

BCLR up_stat_pod,upUnk_f lags 



;3 <* If IPG in WT mode switch to WI mode until next event 
;3 and scedule uplink if there is enough time. *) 

;3 triggered mode of PACEMOOE := FALSE; 

;3 a ;= timeout int - EVENTIHE 

;3 IF (((a > UPSTATJJELAY) AMD (up stat_pnd of uplinl^f lags)) 

;S OR (a > UPLINK DELAY)) THEM 

;3 CALL SCHEDULE UPLINK WITHIN R2LIB; 

;a ELSE 

;3 uplnk_cnfrm of ttm2 flags := TRUE; 

;a 

BCLR triggeredjnode,PACEHCDE ;Set in non-WT mode 

LDA timeout_int 

SUB EVENT I HE ; Determine time remaining before next event 

CHP #UPLINKDELAY ;Enough time for block uplink? 

BHI GNLS.SU ; Yes, then schedule uplink 

BRCLR up stat_pnd,uplink_fUgs,GNLS NUPLNK 

CHP #UPSTATJ>ELAY ;Enough time for status uplink? 

BLS GNLS_NUPLNK ; No, don't attempt uplink 

JSR SCHEDULE UPLINK 

BRA 6NLS_CTLBF 

BSET uplnk_cnfrm,tlm2_f lags ; Indicate uplink to follow next event 



GNLS SU 



GNLS NUPLNK 



;3 (» Enable TELBF interrupts and clear ADC interrupts *) 

;3 TELBFINT of ipgstate msk := FALSE; 

;3 END; 

;a 

;3 IROREG := ADC I NT MSK; 



GNLS_CTLBF 
GNLS_DOME 

GNLS END 



BCLR 

LDA 
STA 

RTS 



TELBFINT, ipgs tat ejnsk 
#ADCINT_HSK 

IROREG ; CI ear pending ADC interrupts 



;3END; (* GNLSINTJ>RQC *) 



SEJECT 
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0423& 01 00* 05 
0426* 4F 
0427& B7 00* 
0429& 20 68 



042B& OD 00* 
042E& ID 00* 
0430& A6 ..X 

0432& B7 00* 
Q434& A6 ..X 

04364 B7 00* 
0438* CE 0000* 
043B& A6 43 
043D& 20 49 



11 



2071 
2072 
2073 
2074 
2075 
2076 
2077 
2078 
2079 
2080 
2081 
2082 
2083 
2084 
2085 
2086 
2087 
2088 
2089 
2090 
2091 
2092 
2093 
2094 
2095 
2096 
2097 
2098 
. 2099 
2100 
2101 
2102 
2103 
2104 
2105 
2106 
2107 
2108 
2109 
2110 
2111 
2112 
2113 
2114 
2115 
2116 
2117 
2118 
2119 
2120 
2121 
2122 

2123 
2124 

2125 
2126 
2127 
2128 
2129 
2130 
2131 
2132 
2133 
2134 
2135 
2136 



3 ************************ TELBFIHT PRQC **************************** 

^a* 

This procedure is the telemetry buffer interrupt handler- It is 
non-preemptive. It is responsible for scheduling pending uplinks 
(I.e. markers). If the last uplink was a RAM uplink, all pending 
uplinks are cancelled. Otherwise, if there is either a pending 
interrogate block or measured value, they Bre upl inked. 

ENTRY CONDITIONS: 
Ho other interrupts are allowed during this routine, ADC must 
be cleared if one occurred during uplink reschedule, and 
processing of CAIN/LOSS must wait until after uplink TELBF 
completes to insure that the uplink flags are not corrupted 



EXIT CONDITIONS: 
None. 



************** 



aPROCEOURE TELBFINT PROC; 
33EGIN 



(* If RAM uphnk complete clear all pending uplinks *) 
IF (uplnkdisabled of uplink flags) THEN 
upl ink_f lags := 0; 



TELBFINT PROC 



BRCLR 
CLRA 
STA 
BRA 



uplnk_disabled,tiplink_flags,TLBF_UPLNlC 

upl ink_f lags ;Clear all pending uplinks 
TLBF DONE 



;a 
;a 
;a 
;a 
;a 
;a 
;a 
;a 
;a 
;a 
;a 
;a 
;a 
;a 



ELSE 
BEGIN 

(* Previous uplink was not a RAM uplink, uplink pending *) 
IF (mrkr_pnd of uplink flags) THEN 
BEGIN 

(* Marker from POS is pending *) 
mrkr_pnd of uplink flags :* FALSE; 
TELADHI :r HIADDR<marker valCOT); 
TELADLO := lOADDR(marker~val[0]); 
BYTCOUNT := marker cnt; " 
ULID := MARKER ID;" 
RAH_uplink of TELSTAT := TRUE; 
END; 



TLBF UPLNK 



BRCLR 

BCLR 

LDA 

STA 
LDA 

STA 
LDX 
LDA 
BRA 



mrkrjsnd,uplink_flags,TLBF LCAP 
mrkr_pnd, upl ink_f lags 

#HIGH marker_vaT ;Load register with hi address of marker value 

address 

TELADHI 

#lOW marker val 



TELADLO 
marker cnt 
SHARKER ID 
TLBF STRTU 



;Load register with low address of marker value 
address 

;Load x with byte count 

;Loed a with marker identification byte 



?a 
;a 
;s 
;s 
;3 
;a 



ELSE IF <lcap_mrkr_pnd of uplink flags) THEN 
BEGIN *~ 

(* Marker from loss of capture is pending 
lcapjnrkr_pnd of uplink flags := FALSE; 
TELADHI :« HIADDRClcap marker); 
TELADLO := LOADDRClcap'raarker); 
BYTCOUNT 1; 
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043 F& 08 00* 10 
0442& 18 00* 
0444& A6 ..X 

0446A B7 00* 
0448& A6 ..X 

044A4 87 00* 
044C& AE 01 
044E& A6 43 
0450& 20 36 



0452& 09 00* 20 
0455& 19 00* 
0457& B6 00* 
0459A C7 0000* 



047H 16 00* 
0473& 20 1E 



0475& OF 00* 18 
0478& 1F 00* 
047A4 A6 ..X 

047C4 87 00* 
047E& A6 ..X 

0480& B7 00* 
0482& CE 0000* 
048S& C6 0000* 

0488& BF 00* 
048A& B7 00* 
048C& 16 00* 
048E& 20 03 



2137 
2138 
2139 
2140 
2141 
2142 
2143 
2144 
2145 

2146 
2147 

2148 
2149 
2150 
2151 
2152 
2153 
2154 
2155 
2156 
2157 
2158 
2159 
2160 
2161 
2162 
2163 
2164 
2165 
2166 
2167 
2168 
2169 
2170 
2171 
2172 
2173 
2174 
2175 
2176 
2177 
2178 
2179 
2180 
2181 
2182 
2183 
2184 
2185 

2186 
2187 

2188 
2189 
2190 
2191 
2192 
2193 
2194 
2195 
2196 
2197 
2198 
2199 
2200 



;a 
;a 
;a 



ULIO := MARKER ID; 
RAH_uplink of TELSTAT := TRUE; 
END; 



TLBF LCAP 



BRCLR 

BCLR 

LDA 

STA 
LDA 

STA 
LDX 
LDA 
BRA 



lcapjnrkrj>nd f uplink flags, TLBF IHTRRG 
tcap_mrkrj>nd,upl fnk_f lags 

#HIGH Icapjnarker Jlood register with hi address of leap marker v 

alue address 

TELADHI 

#LOW Icapjnarker ;Load register with low address byte of leap ma 

rker value address 

TELADLO 

#1 :Load x with byte count 

#MARKER_ID ;Load a with marker identification byte 

TLBF STRTU 



?3 ELSE IF (intrrg_pnd of uplink flags) THEN 

;3 BEGIN 

? a Intrrgjond of uplink_flags := FALSE; 

?a statbyt := uplnk stat; 

,*3 CALLH LOAD_INTRRG UPLINK WITHIN R2LIB; 

;3 RAM_upl ink of TELSTAT := TRUE; 

;3 END; 



TLBF INTRRG 



TLBF LDIN 



BRCLR i n t r rg _pnd, up I i nk_f lags, TLB F_MEAS 

BCLR intrrg_phd,uplink flags 

LDA uplnk_stet 

STA statbyt ;Update status byte 



TLBFJ.D INTEND 



?LOAD_lNTRRGJJPLINK 



BSET 
BRA 



RAH_upl Ink, TELSTAT initiate uplink 
TLBF DONE 



;3 ELSE IF (meas_pnd of uplink flags) THEN 

;a BEGIN 

;3 roeas_pnd of uplink flags := FALSE; 

;3 TELADHI := HIADORcSeas valCO]); 

;a TELADLO := LOADDR(meas~val [0] ); 

;3 BYTCOUNT me as count; 

;3 ULIO :* meas id;" 

;3 RAMuplink of TELSTAT :* TRUE; 

;a end; 



TLBF MEAS 



TLBF STRTU 



BRCLR 

BCLR 

LDA 

STA 
LDA 

STA 
LDX 
LDA 

STX 
STA 
BSET 
BRA 



roeas_pnd,uplink_flags # TLBF NUPLNK 
me8S_pnd r upl ink_f lags 

#HIGH meas^val ;Load register with hi address of measured valu 

e address 

TELADHI 
#LOU meas val 



TELADLO 
meas_count 
meas id 



;Load register with low address byte of measure 
d value address 

;Load x with byte count 

;Load a with marker identification byte 



BYTCOUNT 
ULID 



; Store byte count 
;Store marker identification byte 
RAMupl ink, TELSTAT ;Set the telemetry status byte and exit 
TLBF DONE 



;3 ELSE (* No pending uplinks *) 
;3 uplink flags 0; 

;3 END; 

;3 C* Clear pending ADC interrupts *) 
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0490& 4F 
Q491& B7 00* 

0493& A6 01 
04954 B7 00* 

0497& 81 



2201 
2202 
2203 
2204 
2205 
2206 
2207 
2208 
2209 
2210 
2211 



;3 IROREG := AOCINT HSK; 



TLBF HUPLHK 



TLBF DOME 



TLBF END 



CLRA 
STA 

LDA 
STA 

RTS " 



uplinJe_flags ;Clear uplink flags, no uplinks pending 
;Clear pending ADC interrupts 



#ADCJHT HSK 
IRQREG *" 
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120 
121 
122 
123 

12; 

125 
126 
127 
126 
129 
130 
131 
132 
133 
134 
135 
136 
137 
136 
139 

no 

U1 
142 
U3 
144 
145 
146 
147 
145 
149 
150 
151 
152 
153 
154 
155 
156 
157 
158 
159 
160 
161 
162 
163 



9* 
V 

a* 
a* 
a* 
a* 
a* 

9* 

a* 
a* 



LOAD WRRG UPLIMK 



This ■scro loads the telemetry registers fn preparation for an 
Interrogate block uplink. 

EWTRY CONDITIONS: 
Uplink data registers are ready to be loaded without conflict. 

EXIT CONDITIONS: 
The interrogate block the tile of WRRC SIZ and starting at 
the address pointed to by INTRRGJU) is setup for uplink. 



MACRO LOAD IKTRRG UPLINK; 
BEGIK 

C* Load interrogate status byte *) 
intrrg_R2_stat := R2_stat; 

(• Uplink~channel assumed free and uplnic disabled bit set *) 
TELADHI :* HIBYTECIHTRRG AO); 
TELADLO := LOUBYTEUHTRRC AO); 
BYT COUNT :x JHTRRC SI2; 
ULID RAHJD; 

EKD; {* LQADJKTRRGJJPLIHJC •) 



:LOADJMTRRC_UPL!«K 3EHACR0 

IDA r2 stat 



STA 
LDA 
STA 

LDA 
STA 

LDA 
STA 
LDA 
STA 
XEMDK 



;Get r2 status byte 



intrrg_r2_stat ;put in interrogate status byte 
#HICH WTRRC_AD ;Get address hi byte 

TELADHI ;Send it to the hardware 

#LCW !VTRRG_A0 ;Get address lo byte 

TELADLO ;Send it to the hardware 

#:HTRRG_SIZ ;Get byte count 

BYTCCUMT ;Urlte hardware register 

#RAXJ0 ;Get ID 

Ut-ID ; etc. etc. etc. 



SEJECT 
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164 

165 

166 

167 

168 

169 

170 

171 

172 

173 

174 

175 

176 

177 

178 

17? 

180 

181 

182 

183 

184 

185 

186 

187 

188 

1B9 

190 

191 

192 

193 

194 

195 

196 

197 

198 

199 

200 

201 

202 

203 

204 

205 

206 

207 

239 

240 

241 



j»* LOAD JIAHJJPL INK *•**•*•*******•*••***••♦*** 

•9* This i»cro loads the telemetry register* in preparation for a 
S* RAH block uplink. 

ENTRY CONDITIONS: 
Uplink data registers are ready to be loaded without conflict. 

EXIT CONDITIONS: 
A RAM block of length indicated by P_rd_bytes starting at the 
address indicated by P_rd_start is setup for uplink. 

'if 

»♦♦#******•♦»♦»*•**#•***•»***************************** •»*■•»•« 



MACRO L0AD_RAMJUPL1 NK; 
BEG IX 

C* uplink channel assured free and uplnk_disabled bit set *) 

intrrg R2 stat :* R2_stat; 

TELADHT :« H!BYTE(P_rd_start); 

TELADLO :» LOV9YTE(P_rd_start); 

BYTCOUHT :* P_rd_bytes; 

ULI0 :* RAHJD; 

EKD; C* LOADJtAHJUPLHK •> 



LOAD RAH UPLINK XHACRO 
~~ " LDA 
STA 
LDA 
STA 



LDA 
STA 
LDA 
STA 
XEKDH 



SftESETLN 

SXOALLPUBLIC 
M0L1ST 



r2 stat ?Get r2 status byte 

intrrg r2_stet ;put in interrogate status byte 

P rd start ;Get address hi byte 

TELADHi ;Send it to the hardware 



LDA P rd start +1 ;Get address lo byte 

STA TELADLO ;Send it to the hardware 



P rd bytes 
BYTCOUKT 
#RAH ID 

ulid" 



;Get byte count 

;Urite hardware register 

;Get ID 

; etc. etc. etc. 



;Don't List the equate file 
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0180& 05 00* ID 



0183& E6 00* 
0185& C7 0000* 
0188i C6 0000* 
01SS& B7 00* 

oi sot a> ....x 

019M B7 00* 

01921 C6 0000* 

01954 B7 00* 

01971 A6 CO 

01991 B7 00* 

019B4 15 00* 
0190* CC 01DU 



OUO* 09 00* U 



01A34 B6 00* 
01A5* C7 0000* 



1106 

1107 

1108 

1109 

1110 

1111 

1112 

1113 

1114 

1115 

1116 

1117 

1118 

1119 

1120 

1121 

1122 

1123 

1124 

1125 

1126 

1127 

1128 

1129 

1130 

1131 

1132 

1133 

1134 

1135 

1136 

1137 

1138 

1139 

1140 

1141 

1142 

1143 

1144 

1145 

1146 

1147 

1148 

1149 

1150 

1151 

1152 

1153 

1154 

1155 

1156 

1157 

1158 

1159 

1160 

1161 

1162 

1163 

1164 

1165 

1166 

1167 

1168 

1169 

1170 

1171 

1172 

1173 



9* 

3* 
9* 

a* 

9* 

9* 

9* 
9* 
9* 
9* 
9* 
9* 



SCHEDULE UPLINK 



9* 

J* Thvr. procedure schedules uplink of RAM, 
9* status in this order of priority. 



interrogate block, or 



ENTRY CONDITIONS: 
Ho other interrupt! are allowed during this routine, ADC 
interrupts sust be cleared if one occurred Airing uplink 
scheduling. Processing of the GAIN/LOSS and TLBF interrupts 
wait until after uplink is scheduled to ensure that the 
uplink flags are not corrupted. 

EXIT CONDITIONS: 

Either a RAM block, an Interrogate block, or a status 
confirmation block are upl inked if any are pending. 
Status is isbedded in a RAM or Interrogate block uplink. 



9 PROCEDURE SCHEDULE_UPLINK; 

9 BEGIN 

9 

9 (* Load status byte for RAM uplink and the load telemetry 

9 registers for uplink. *) 

9 IF (up RAM.pnd.of uplfnk.f lags) THEN 

9 BEGIN 

9 (* Load for Ran uplink *) 

9 CALLM LOAD JtAMJJPL INK; 

9 up RAM_pnd~of upl inW lags FALSE; 

9 END;" 



SCHEDULE UPLINK 



BRCLR 



;Jutp if NOT RAM uplink 
up_RAH_pnd,upl i nk_f lags, SUP_! NT RRG 



SU LRU 



; LOAD_RAMJUPL I NK 



SU LRU END 



IDA 
STA 
LDA 
STA 

LDA 
STA 

LDA 
STA 
LDA 
STA 

BCLR 
JMP 



r2_stat ;Get r2 status byte 

1ntrrg_r2_stat ;put in interrogate status byte 



P rd start 
TELADKI 

P rd start *1 
TELADLO 

P rd bytes 
BYTCOUNT 
fRAM ID 
ULID* 



;Get address hi byte 
•Send it to the hardware 

;Get address lo byte 
;Send it to the hardware 

;Get byte count 

;Urite hardware register 

;Get ID 

; etc. etc. etc. 



up RAMjjnd.uplink flags ;Clear the pending flag 
SUP.STRT ;Go start uplink 



;9 ELSE IF <intrrg_pnd of upl ink_f lags) THEN 

;9 BEGIN 

;9 C" Load for interrogate block uplink •) 

;9 CALLM LOADJNTRRGJJPLINK WITHIN R2LIB; 

;9 1ntrrg^nd"of upl!nk_flegs FALSE; 

;fi END; 



SUP INTRRG 



SU LIU 



BRCLR 



;Jmp if NOT interrogate 
I nt r rg _pnd, upl i nkj lags, SUP_ST AT 



;LOAD INTRRGJUPLINK 

LDA " r2_stat ;Cet r2 status byte 

STA lntrrg_r2_stat ;put in interrogate status byte 
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0U8& A6 ..X 
01AAA B7 00* 

OUU A6 ..X 
01AEI B7 00* 

01B01 A6 00* 
01B24 B7 00* 
01&41 A6 CO 
01B6& 87 00* 

D1B8& 19 00* 
OIBAt CC 01D1& 



OlBDi 07 00* 
OlCOi A6 80 
01C2& B7 00* 
01C4& 17 00* 
01C6& 20 09 



08 



01CK 3F 00* 
01CA& CD OlDEi 
01CD& U 00* 
01CF& 20 OC 



01 OH B6 00* 
01031 C7 0000* 
01D6& CD 010EI 
01D94 AA 28 
OlDBi B7 00* 

OlDDt 81 



1174 

1175 

1176 

1177 

1178 

1179 

1180 

1181 

1182 

1183 

1184 

1185 

1186 

1187 

1188 

1189 

1190 

1191 

1192 

1193 

1194 

1195 

1196 

1197 

119B 

1199 

1200 

1201 

1202 

1203 

1204 

1205 

1206 

1207 

1208 

1209 

1210 

1211 

1212 

1213 

1214 

1215 

1216 

1217 

1218 

1219 

1220 

1221 

1222 

1223 

1224 

1225 

1226 

1227 

1228 

1Z29 

1230 

1231 

1232 

1233 

1234 

1235 

1236 

1237 

1238 

1239 

1240 



SU LIU END 



IDA tHIGH INTRRGJU) ;Get address hi byte 

STA TELADHI ~ ;Send it to the hardware 

LDA fLOU INTRRG AD ;C«t address lo hrte 

STA TELADLO " ;Send it to the hardware 

LDA flHTRRG SIZ ;Get bfXt count 

STA BTTCCXJNT ;Urite hardware register 

LDA #RAH ID ;Get ID 

STA ULID" ; etc. etc. etc. 

BCLR tntrrg_pnd,uplink_flags ;Clear the flag 

JHP SUP_STRT ;Go start uplink 



;B ELSE IF (up_stat_pnd of uplink_f lags) THEM 
*;5 BEGIN 

•5 (* Load for status ID byte for uplink *) 

;3 ULID :* STATUS JD; 

; S up statjrd of uplink_f lags !« FALSE; 

)a END;" 



SUP STAT 



;Juip if NOT status ID byte 
BRCLR up stat_cnd,upUnk_fla9s,SUP_NO_UP 
LDA fSTATUS ID 

STA ULID "* ;Urite status ID to hardware 

BCLR up 5tat_pnd,uplink_flegs ;Clear the flag 
BRA SUP STRT ~ ;Go~start Uplink 



ELSE 

BEGIN , . 

(* No uplink scheduled reset telemetry and exit routine ") 
uplink flags :* 0; 
CALL SET TLK TYPE 

down Untenable of TELSTAT := TRUE; 
EXIT; 
END; 



SUP NO UP 



CLR uplink flags ;Clear uplinkjlags, no uplink 

JSR SET TLM TYPE ;Set telemetry type and enable downlink 

BSET downlink enabled, TEL STAT 

BRA SUP END " ; Co exit 



(• Set telemetry type start uplink and enable downlink *) 
statbyt :» uplnk_stat; 
CALL SET TLNJYPE; 
downtinTenable of TELSTAT :« TRUE; 
RAM uplink of TELSTAT :« TRUE; 



SUP STRT 



SUP END 



IDA 
STA 
JSft 
CRA 
STA 

RTS 



uplnk_stat ;Get uplink status 
statbyt 

SET TLM TYPE ?Set telemetry type 
#(l"SHL"HAM uplink) ♦ Cl SHL oownlink.enabled) 
TELSTAT * ;enable downlink »nd start uplink 

;Retum to caller 



)a END; C* SCHEDULE JUPLIWE *) 



SEJECT 
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SET TLK TTPE 



01DE& C6 0000* 
01EU A4 01 
01E3& 27 04 
01E5i IE 00* 
01E7* 20 02 

01E9& IF 00* 



•9* This procedure decodes the telemetry type in P_tlm_type and 
•a* aets up the hardware and marker enamel accordingly. 

;»* 

EHTRT COHO. : 

p tlm.type contains the desired telemetry. 



01EB& C6 0000* 
OlEEi A4 C6 
0U0& AA 01 
01F2* B7 00* 
01F41 B6 00* 
01F64 A4 38 
01F8& BA 00* 
01FAI B7 00* 



EXIT COHD 



The analog uplink telemetry is updated on the next frame. 
Curr_tlm_type is written to PACE STAT and may not equal 
P tlm type. 

a"- contains the current value of the TELSTAT register. 



;» 
•a 

;« 
;a 

:8 



PROCEDURE SETJLMJTYPE; 
BEGIN 

(* test for markers uplink selected *) 
If (marker enabled of P_tlm_type TRUE) THEN 

marker active of mag_flags :» TRUE; 
ELSE 

marker active of mag_flegs :» FALSE; 



1241 
1242 
1243 
1244 
1245 
1246 
1247 
1248 
1249 
1250 
1251 
1252 
1253 
1254 
1255 
1256 
1257 
1258 
1259 
1260 
1261 
1262 
1263 
1264 
1265 
1266 
1267 
1268 
1269 
1270 
1271 
1272 
1273 
1274 
1275 
1276 
1277 
127B 
1279 
12B0 
1281 
1282 
1283 
1284 
1285 
1286 
1287 
1288 
1289 
1290 
1291 
1292 
1293 

1295 ;B END; C SETJLHJTPE *) 

1296 ; 

1297 

1298 SEJECT 



SET TLM TYPE 



STT ICLR 



USA 

AND 

BEQ 

BSET 

BRA 

BCIR 



p tlm_type ;Jurp if idle markers set 
#Tl SHL marker enabled) 
STT ICLR 

markers active,megjlags ;Show idle markers 
STT_ADJ~ ;Co adjust telera type 

markers^BCtive.magJlags 



;5 



<• adjust the telemetry type *) 

curr tlm type := (P tlm type AND TLM_TYPE_HSK) OR IDLEJIPLIHK; 
TELSTAT T- (TELSTAT^AND TELSTAT_MSK) OR eurr_tlm_type; 



STT AD J 



STT END 



IDA 
AND 
OftA 
STA 
IDA 
AND 
ORA 
STA 

RTS 



p tl*_type 
tTLH TTPE MSK 
#IDLEUPL1NK 
curr tlm_type 
TELSTAT 
fTELSTAT.MSlC 
curr tlm type 
TELSTAT 



;Cet telemetry type 

•Uolate real time uplink type 

;Set uplink idle bit and save as current type 

;Cet current value of TELSTAT 
; and mask changeable bits 
•Set new uplink type 
•Write new TELSTAT and return 
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WHAT IS CLAIMED IS: 

1 1. A method for transmitting data percutaneous ly 

2 between a medical device implanted within a human body 

3 and an external device, comprising the steps of: 



4 (a) formatting the data to be transmitted by: 

5 (1) establishing a frame having a fixed time 

6 interval ; 

7 (2) placing a unique synchronizing signal at a 

8 first fixed range within said frame; 

9 * (3) placing a frame identifier at a second 

10 fixed range within said frame; and 

11 ( 4 ) Placing said data at a third fixed range 

12 within said frame; and 

13 ( b > transmitting said formatted data between said 

14 implanted medical device and said external 

15 device. 



1 2. A method according to claim 1, wherein said 

2 data is representative of more than one type of data, and 

3 wherein said frame identifier is indicative of the data 

4 type within said frame being transmitted. 

1 3. a method according to claim 2, wherein said 

2 data is in digital format. 

1 4. A method according to claim 3, wherein each of 

2 said steps (a)(2), (a)(3) and (a)(4) thereof further 

3 comprises generating a burst of radio frequency energy at 

4 a time within the corresponding fixed range appropriate 

5 to pulse position modulate said burst. 

1 5. An apparatus for transmitting data 

2 percutaneously between an implantable medical device and 

3 an external device, comprising: 

4 (a) frame defining means for defining a 

5 transmission frame of a fixed time interval; 



« — 4 
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6 (b) first means coupled to said frame defining 

7 means for transmitting a synchronizing signal 

8 within a first time range of said transmission 

9 frame ; 

10 (c) second means coupled to said frame defining 

11 means for transmitting a frame identifier 

12 within a second time range of said transmission 

13 frame; and 

14 (<*) third means coupled to said frame defining 

15 means for transmitting said data within a third 

16 time range of said transmission frame. 
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